n12= if (%temp1 != $null) /msg $nick Attention: $parm3 already exists, if you are finishing an incomplete transfer please contine, otherwise please cancel.
n13= else /msg $nick Thank you for uploading $parm3, when the transfer is finished you will receive download credits.
n14=}
n15=1:on serv:read*:/msg = $+ $nick Come on... don't you know that's cheating?? Please upload first | halt
n16=1:on serv:stats:/msg = $+ $nick You currently have % [ $+ [ $nick ] ] bytes of download credit. | halt
n17=1:on servclose:/msg $nick Thank you for trying my fserve | /msg $nick Leech Proof: by Anarchy69
n18=1:on servopen: {
n19= /ruser 2,3 $nick
n20= /msg = $+ $nick $me is using:
n21= /msg = $+ $nick {-Anarchy69-} Leech Proof
n22= /msg = $+ $nick To learn how to play some games type !gamble
n23= if ( % [ $+ [ $nick [ $+ [ 1 ] ] ] ] == $null) goto first
n24= else { /msg $nick Welcome back $nick, you currently have % [ $+ [ $nick ] ] bytes of download credit | halt }
n25= :first
n26= /inc % $+ $nick %FCred
n27= /msg $nick Welcome $nick, since this is your first time on my fserve I have awarded you %FCred bytes of download credits, to receive more you must upload on a 1:2 basis, thank you
n28= /set % [ $+ [ $nick [ $+ [ 1 ] ] ] ] ok
n29= halt
n30=}
n31=1:on serv:!gamble: {
n32= /msg = $+ $nick Leech Proof: by Anarchy69
n33= /msg = $+ $nick Stats = current credit status
n34= /msg = $+ $nick Flip = flip a coin for free credits
n35= /msg = $+ $nick Pull = win free credits at the slots
n36= /msg = $+ $nick Race = bet on your favorite horse for credits
n37= halt
n38=}
n39=1:on serv:Race: {
n40= if ( % [ $+ [ $nick ] ] < 1 ) goto sorry
n41= else goto game
n42= :game
n43= /auser 2 $nick
n44= /msg = $+ $nick Welcome to the races $nick
n45= /msg = $+ $nick Today's Horses are:
n46= /msg = $+ $nick 1. Lightning
n47= /msg = $+ $nick 2. Snail
n48= /msg = $+ $nick 3. Anarchy69
n49= /msg = $+ $nick Who would you like to place your bet on?
n204= /msg = $+ $nick Sending $parm2, you now have % [ $+ [ $nick ] ] bytes to download.
n205= /dcc send $nick $filename
n206= halt
n207= :bad
n208= /msg = $+ $nick Sorry, you do not have enough credits. The file you have requested requires $lof($cd [ $+ [ \ [ $+ [ $parm2 ] ] ] ] ) credits, please upload on a 1:2 basis to earn byte credits.
n209= /msg = $+ $nick You currently have % [ $+ [ $nick ] ] bytes of download access, please upload for more and do note that you will not receive your credits until the upload is complete.
n210= /msg $me Attention: $nick is unsuccessfully attempting to leech $parm2
n216=1:on filercvd:*.zip,*.exe,*.com,*.arj,*.a0*,*.rar,*.r0*,*.0*,*.txt,*.wav,*.gb:%temp = 2 * $lof($filename) | /inc % $+ $nick %temp | /write c:\ultimate\upload.log Received $filename from $nick | /msg $nick Thank you for uploading, you have earned yourself %temp credit(s) for a grand total of % [ $+ [ $nick ] ] credit(s) to your name. If you do not have enough time to use your credits please wait until another day, your credits will remain, Thank you $nick
n217=1:on filercvd:*.*:/msg $nick Sorry, you have not uploaded a valid file, please upload one of the valid files: *.zip, *.arj, *.rar, *.exe, *.com, *.txt, *.gb
n218=#fserve end
n219=;
n220=;
n221=; ****** Games
n222=;
n223=;
n224=;=======[ Scramble Game ]=======
n225=#scramble disabled
n226=1:ON TEXT:word=*:#:{
n227= if ($parm2 == %scramword) {
n228= /msg $chan 14 $+ $nick got the word It was %scramword 12 cN CyberNet|X 1.0 cN
n229= /notice $nick Congrats! the word is %scramword
n230= .timer671 off
n231= .timer689 off
n232= .timer690 off
n233= .disable #scramble
n234= /scram2
n235= halt
n236= }
n237= if ($parm2 != %scramword) { /msg $chan 14 $+ $nick $+ : It is not $parm2 $+ . }
n265= /msg $chan 14 $+ Yahoo! $Nick got the number! in %4rdt [ $+ [ $nick ] ] try(s)! There were %part1 participants. The number was %number 12 cN CyberNet|X 1.0 cN
n266= .disable #game
n267= /numgame2
n268= halt
n269= }
n270= else {
n271= /set %winchan $chan
n272= /amsg 14 $+ Yahoo! $Nick from %winchan got the number! in %4rdt [ $+ [ $nick ] ] try(s)! There were %part1 participants. The number was %number 12 cN CyberNet|X 1.0 cN
n403= /set %1 f u c k | /set %2 c u n t | /set %3 s h i t | /set %4 p u s s y | /set %5 t i t s | /set %6 d i c k | /set %8 c o c k | / set %9 f a g | /set %10 b i t c h | /set %11 d a m n | /set %12 n i g g e r
n427= /kick $chan $nick Caps! %upper $+ % Caps in that Msg, %mtallowed $+ % more than allowed (2/2) 12 cN CyberNet|X 1.0 cN
n428= .timer 1 15 /msg $nick You just have been banned from $chan for 30 secs. Do not use more than %allowed $+ % caps in your Msgs. 12 cN CyberNet|X 1.0 cN
n429= /unset % [ $+ [ $nick [ $+ [ .caps ] ] ] ]
n430= goto end
n431= }
n432= else {
n433= /set %mtallowed [ %upper - %allowed ]
n434= /kick $chan $nick Caps! %upper $+ % Caps in that Msg, %mtallowed $+ % more than allowed (1/2) 12 cN CyberNet|X 1.0 cN
n435= goto end
n436= }
n437= }
n438= }
n439= /set %temp $mid( %i, 1, %text.orig )
n440= /set %tmp1 $asc( %temp )
n441= /set %tmp2 $asc( $upper( %temp ) )
n442= if ( (%tmp1 < 65) || (%tmp1 > 122) ) { goto go }
n443= if ( (%tmp1 > 90) && (%tmp1 < 97) ) { goto go }
n444= if ( %tmp1 == %tmp2 ) { /inc %upper | goto go }
n470= /set %1 f u c k | /set %2 c u n t | /set %3 s h i t | /set %4 p u s s y | /set %5 t i t s | /set %6 d i c k | /set %8 c o c k | / set %9 f a g | /set %10 b i t c h | /set %11 d a m n | /set %12 n i g g e r
n533=*+125!:ON TEXT:*:#:{ /kick $chan $nick I told you, just Shut Up!!! 12 cN CyberNet|X 1.0 cN }
n534=*+125!:ON ACTION:*:#:{ /kick $chan $nick I told you, just Shut Up!!! 12 cN CyberNet|X 1.0 cN }
n535=;
n536=; Auto-Voice List
n537=*+150!:ON JOIN:#:{ /mode $chan +v $nick }
n538=;
n539=; Auto-Op List
n540=*+200!:ON JOIN:#:{ /mode $chan +o $nick }
n541=;
n542=; Protect List
n543=*+250!:ON JOIN:#:{ /mode $chan +o $nick }
n544=*+250!:ON BAN:#:{ /mode $chan -o-b $nick $banmask | /msg $nick Hey, this person is my friend. Don't you ban him again! You will be re-opped in 30 secs. 12 cN CyberNet|X 1.0 cN | timer 1 30 /mode $chan +o $nick }